Chip 2003 July/CMCD0703.ISO/Software/Freeware/Grafica/ethumb/Setup.exe/{app}/EzThumbs.exe/0/RCDATA/TFRMTHUMBNAILS/TFRMTHUMBNAILS.txt

Text File | 2003-05-07 | 30KB | 1,142 lines

object frmThumbnails: TfrmThumbnails
  Left = 252
  Top = 107
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  AutoScroll = False
  Caption = 'Thumbnail Generator'
  ClientHeight = 402
  ClientWidth = 592
  Color = clBtnFace
  Constraints.MinHeight = 429
  Constraints.MinWidth = 600
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  OldCreateOrder = False
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object pgcPreview: TPageControl
    Left = 292
    Top = 0
    Width = 300
    Height = 383
    ActivePage = tbsOriginal
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 1
    TabStop = False
    OnChange = pgcPreviewChange
    OnChanging = pgcPreviewChanging
    object tbsOriginal: TTabSheet
      HelpContext = 80
      Caption = '&Original image'
      ImageIndex = 1
      object bvlButtons: TBevel
        Left = 0
        Top = 304
        Width = 292
        Height = 4
        Anchors = [akLeft, akRight, akBottom]
        Shape = bsTopLine
      end
      object imgOriginal: TEfImageEnView
        Left = 0
        Top = 0
        Width = 292
        Height = 289
        Cursor = crDefault
        Hint =
          'Original image; right click with your mouse to open shortcut men' +
          'u'
        ParentCtl3D = False
        Center = True
        MouseInteract = [miScroll]
        Anchors = [akLeft, akTop, akRight, akBottom]
        PopupMenu = pmnOriginalImage
        TabOrder = 0
        ScaleToFit = False
      end
    end
    object tbsPreview: TTabSheet
      HelpContext = 90
      Caption = '&Preview output'
      ImageIndex = 2
      object bvlButtons2: TBevel
        Left = 0
        Top = 304
        Width = 292
        Height = 4
        Anchors = [akLeft, akRight, akBottom]
        Shape = bsTopLine
      end
      object lblNoFile: TLabel
        Left = 0
        Top = 0
        Width = 292
        Height = 289
        Alignment = taCenter
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoSize = False
        Caption = 'There is no valid image selected.'
        Layout = tlCenter
      end
      object imgPreview: TEfImageEnView
        Left = 0
        Top = 0
        Width = 292
        Height = 289
        Cursor = crDefault
        Hint =
          'Thumbnail configured according to settings; right click with you' +
          'r mouse to open shortcut menu'
        ParentCtl3D = False
        Center = True
        MouseInteract = [miScroll]
        Anchors = [akLeft, akTop, akRight, akBottom]
        PopupMenu = pmnPreviewImage
        Visible = False
        TabOrder = 0
        ScaleToFit = False
      end
    end
  end
  object pgcFiles: TPageControl
    Left = 0
    Top = 0
    Width = 292
    Height = 383
    ActivePage = tbsFiles
    Anchors = [akLeft, akTop, akBottom]
    TabOrder = 0
    TabStop = False
    OnChange = pgcFilesChange
    OnChanging = pgcFilesChanging
    object tbsFiles: TTabSheet
      HelpContext = 70
      Caption = '&Files'
      object lbl_cmbFileFilter: TEnhLabel
        Left = 8
        Top = 9
        Width = 59
        Height = 13
        Caption = 'Files of &type:'
        FocusControl = cmbFileFilter
      end
      object lblLookInFolder: TEnhLabel
        Left = 8
        Top = 56
        Width = 38
        Height = 13
        Caption = 'Look &in:'
      end
      object lbl_edtSaveIn: TEnhLabel
        Left = 8
        Top = 309
        Width = 39
        Height = 13
        Caption = 'Sa&ve in:'
        FocusControl = edtSaveIn
      end
      object cmbFileFilter: TLblComboBox
        Left = 8
        Top = 24
        Width = 265
        Height = 21
        Hint = 'Defines the type of images to display in the file list'
        Style = csDropDownList
        DropDownCount = 12
        ItemHeight = 13
        TabOrder = 0
        OnChange = cmbFileFilterChange
        Items.Strings = (
          'All images'
          'Web images (*.jpg;*.jpe;*.jpeg;*.png)'
          'JPEG (*.jpg;*.jpeg;*.jpe;*.jpc;*.j2k;*.jp2)'
          'Portable Bitmap (*.pbm;*.pgm;*.ppm)'
          'Portable Network Graphics (*.png)'
          'Tagged Image File Format (*.tif;*.tiff;*.fax)'
          'Truevision Targa (*.tga;*.targa;*.vda;*.vst)'
          'Windows Enhanced Meta File (*.emf)'
          'Windows Meta File (*.wmf)'
          'Windows or OS/2 Bitmap (*.bmp;*.dib;*.rle)'
          'Zsoft PC Paintbrush (*.pcx)')
        AddNewToStart = False
        AddNewToList = False
        CaseSensitive = False
        DestroyObjects = False
        LimitToList = True
        ReadOnly = False
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbl_cmbFileFilter
        LabelRelLeft = 0
        LabelRelTop = -15
      end
      object edtSaveIn: TLblEdit
        Left = 8
        Top = 324
        Width = 241
        Height = 21
        Hint =
          'Choose the folder that should receive the thumbnails. Leave blan' +
          'k to use the current folder'
        Anchors = [akLeft, akBottom]
        TabOrder = 2
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbl_edtSaveIn
        LabelRelLeft = 0
        LabelRelTop = -15
      end
      object btnSaveIn: TAttachedButton
        Left = 250
        Top = 324
        Height = 21
        Hint = 'Browse|Browse disk'
        Anchors = [akLeft, akBottom]
        TabOrder = 3
        Title = 'Save in'
        AttachedControl = edtSaveIn
        AttachTwoWay = True
        AllowMultiSelect = False
        BrowseDir = True
        OnGetName = btnSaveInGetName
      end
      object pnlLookIn: TPanel
        Left = 8
        Top = 76
        Width = 265
        Height = 217
        Anchors = [akLeft, akTop, akRight, akBottom]
        BevelOuter = bvNone
        TabOrder = 1
        object vclSplitter: TSplitter
          Left = 0
          Top = 85
          Width = 265
          Height = 8
          Cursor = crVSplit
          Hint = 'Move splitter to resize the "Explorer" windows'
          Align = alTop
          ResizeStyle = rsUpdate
        end
        object treLookInFolder: TPTShellTree
          Left = 0
          Top = 0
          Width = 265
          Height = 85
          Hint = 'Select the folder that contains your images'
          ShellList = lstFiles
          Options = [ptstoAutoFill, ptstoDefaultKeyHandling, ptstoShowHidden]
          Indent = 19
          Align = alTop
          TabOrder = 0
          PopupMenu = pmnTreeList
          Constraints.MinHeight = 16
        end
        object lstFiles: TEnhShellList
          Left = 0
          Top = 93
          Width = 265
          Height = 124
          Hint =
            'Select images to process; press Ctrl+click to select multiple fi' +
            'les'
          Options = [ptsloAutoFill, ptsloDefaultKeyHandling, ptsloDontChangeFolder, ptsloDontGoBelowBase, ptsloHideFoldersWhenLinkedToTree, ptsloFolderContextMenu]
          OnFillComplete = lstFilesFillComplete
          Align = alClient
          HideSelection = False
          IconOptions.AutoArrange = True
          MultiSelect = True
          PopupMenu = pmnFileList
          TabOrder = 1
          ViewStyle = vsList
          Constraints.MinHeight = 16
          OnSelectItem = lstFilesSelectItem
          OnRefreshItem = lstFilesRefreshItem
          OnShowItem = lstFilesShowItem
        end
      end
    end
    object tbsSettings: TTabSheet
      HelpContext = 60
      Caption = '&Settings'
      ImageIndex = 1
      object lbl_edtMaxWidth: TEnhLabel
        Left = 8
        Top = 9
        Width = 54
        Height = 13
        Caption = 'Max. &width:'
        FocusControl = edtMaxWidth
      end
      object lbl_edtMaxHeight: TEnhLabel
        Left = 98
        Top = 9
        Width = 58
        Height = 13
        Caption = 'Max. &height:'
        FocusControl = edtMaxHeight
      end
      object lbl_edtPrefix: TEnhLabel
        Left = 98
        Top = 57
        Width = 58
        Height = 13
        Caption = '&Prefix/suffix:'
        FocusControl = edtPrefix
      end
      object lblJpgQuality: TEnhLabel
        Left = 82
        Top = 112
        Width = 60
        Height = 13
        Hint = 'Double-click to reset the trackbar'
        Alignment = taCenter
        Caption = '&JPEG quality'
        FocusControl = tbrJpgQuality
        OnDblClick = ResetSlider
      end
      object lblBrightness: TEnhLabel
        Left = 86
        Top = 160
        Width = 49
        Height = 13
        Hint = 'Double-click to reset the trackbar'
        Alignment = taCenter
        Caption = '&Brightness'
        FocusControl = trbBrightness
        OnDblClick = ResetSlider
      end
      object lblContrastLess: TEnhLabel
        Left = 12
        Top = 208
        Width = 4
        Height = 16
        Caption = '-'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object lblContrastMore: TEnhLabel
        Left = 204
        Top = 208
        Width = 6
        Height = 13
        Alignment = taRightJustify
        Caption = '+'
      end
      object lblContrast: TEnhLabel
        Left = 91
        Top = 208
        Width = 39
        Height = 13
        Hint = 'Double-click to reset the trackbar'
        Alignment = taCenter
        Caption = '&Contrast'
        FocusControl = trbContrast
        OnDblClick = ResetSlider
      end
      object lblSharpness: TEnhLabel
        Left = 87
        Top = 256
        Width = 50
        Height = 13
        Hint = 'Double-click to reset the trackbar'
        Alignment = taCenter
        Caption = 'Sharpn&ess'
        FocusControl = trbSharpness
        OnDblClick = ResetSlider
      end
      object lblRotate: TEnhLabel
        Left = 96
        Top = 304
        Width = 32
        Height = 13
        Hint = 'Double-click to reset the trackbar'
        Alignment = taCenter
        Caption = '&Rotate'
        FocusControl = trbRotate
        OnDblClick = ResetSlider
      end
      object lblQuality1: TEnhLabel
        Left = 8
        Top = 112
        Width = 6
        Height = 13
        Caption = '1'
      end
      object lblQuality100: TEnhLabel
        Left = 190
        Top = 112
        Width = 18
        Height = 13
        Caption = '100'
      end
      object lblBrightnessLess: TEnhLabel
        Left = 12
        Top = 160
        Width = 4
        Height = 16
        Caption = '-'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object lblBrightnessMore: TEnhLabel
        Left = 204
        Top = 160
        Width = 6
        Height = 13
        Alignment = taRightJustify
        Caption = '+'
      end
      object lblSharpnessLess: TEnhLabel
        Left = 12
        Top = 256
        Width = 4
        Height = 16
        Caption = '-'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
      end
      object lblSharpnessMore: TEnhLabel
        Left = 204
        Top = 256
        Width = 6
        Height = 13
        Alignment = taRightJustify
        Caption = '+'
      end
      object lblRotateLeft: TEnhLabel
        Left = 8
        Top = 304
        Width = 25
        Height = 13
        Caption = '-180�'
      end
      object lblRotateRight: TEnhLabel
        Left = 184
        Top = 304
        Width = 28
        Height = 13
        Alignment = taRightJustify
        Caption = '+180�'
      end
      object lbl_cmbResizeFilter: TEnhLabel
        Left = 8
        Top = 57
        Width = 46
        Height = 13
        Caption = 'Al&gorithm:'
        FocusControl = cmbResizeFilter
      end
      object lbl_cmbResize: TEnhLabel
        Left = 188
        Top = 9
        Width = 35
        Height = 13
        Caption = 'Resi&ze:'
        FocusControl = cmbResize
      end
      object lbl_cmbNewName: TEnhLabel
        Left = 188
        Top = 57
        Width = 54
        Height = 13
        Caption = '&New name:'
        FocusControl = cmbNewName
      end
      object edtMaxWidth: TLblEdit
        Left = 8
        Top = 24
        Width = 81
        Height = 21
        Hint = 'Defines maximum width for thumbnail creation'
        TabOrder = 0
        OnEnter = FieldEnter
        OnExit = FieldExit
        OnKeyPress = KeyPress
        OnKeyUp = KeyUp
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbl_edtMaxWidth
        LabelRelLeft = 0
        LabelRelTop = -15
      end
      object edtMaxHeight: TLblEdit
        Left = 98
        Top = 24
        Width = 81
        Height = 21
        Hint = 'Defines maximum height for thumbnail creation'
        TabOrder = 1
        OnEnter = FieldEnter
        OnExit = FieldExit
        OnKeyPress = KeyPress
        OnKeyUp = KeyUp
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbl_edtMaxHeight
        LabelRelLeft = 0
        LabelRelTop = -15
      end
      object edtPrefix: TLblEdit
        Left = 98
        Top = 72
        Width = 81
        Height = 21
        Hint =
          'Defines the prefix/suffix added to the name of the thumbnail fil' +
          'e'
        TabOrder = 4
        OnEnter = FieldEnter
        OnExit = FieldExit
        OnKeyPress = edtPrefixKeyPress
        OnKeyUp = edtPrefixKeyUp
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbl_edtPrefix
        LabelRelLeft = 0
        LabelRelTop = -15
      end
      object tbrJpgQuality: TTrackBar
        Left = 4
        Top = 128
        Width = 212
        Height = 25
        Hint =
          '70|The higher the value, the better the quality and the bigger t' +
          'he file'
        Max = 100
        Min = 1
        Orientation = trHorizontal
        ParentShowHint = False
        PageSize = 5
        PopupMenu = pmnReset
        Frequency = 5
        Position = 80
        SelEnd = 0
        SelStart = 0
        ShowHint = True
        TabOrder = 6
        ThumbLength = 15
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = PositionChanged
      end
      object trbBrightness: TTrackBar
        Left = 4
        Top = 176
        Width = 212
        Height = 25
        Hint = '0|Adjusts the brightness used to create the thumbnails'
        Max = 100
        Min = -100
        Orientation = trHorizontal
        ParentShowHint = False
        PageSize = 10
        PopupMenu = pmnReset
        Frequency = 5
        Position = 0
        SelEnd = 0
        SelStart = 0
        ShowHint = True
        TabOrder = 8
        ThumbLength = 15
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = PositionChanged
      end
      object trbContrast: TTrackBar
        Left = 4
        Top = 224
        Width = 212
        Height = 25
        Hint = '0|Adjusts the contrast used to create the thumbnails'
        Max = 100
        Min = -100
        Orientation = trHorizontal
        ParentShowHint = False
        PageSize = 10
        PopupMenu = pmnReset
        Frequency = 5
        Position = 0
        SelEnd = 0
        SelStart = 0
        ShowHint = True
        TabOrder = 10
        ThumbLength = 15
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = PositionChanged
      end
      object trbSharpness: TTrackBar
        Left = 4
        Top = 272
        Width = 212
        Height = 25
        Hint = '0|Adjusts the image sharpness used to create the thumbnails'
        Max = 100
        Min = -100
        Orientation = trHorizontal
        ParentShowHint = False
        PageSize = 10
        PopupMenu = pmnReset
        Frequency = 5
        Position = 0
        SelEnd = 0
        SelStart = 0
        ShowHint = True
        TabOrder = 12
        ThumbLength = 15
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = PositionChanged
      end
      object trbRotate: TTrackBar
        Left = 4
        Top = 320
        Width = 212
        Height = 25
        Hint = '0�|Rotation applied to thumbnail image'
        Max = 180
        Min = -180
        Orientation = trHorizontal
        ParentShowHint = False
        PageSize = 90
        PopupMenu = pmnReset
        Frequency = 90
        Position = 0
        SelEnd = 0
        SelStart = 0
        ShowHint = True
        TabOrder = 14
        ThumbLength = 15
        TickMarks = tmBottomRight
        TickStyle = tsAuto
        OnChange = PositionChanged
        OnExit = edtRotateExit
      end
      object cmbResizeFilter: TLblComboBox
        Left = 8
        Top = 72
        Width = 81
        Height = 21
        Hint = 'Defines the algorithm used for resizing images'
        Style = csDropDownList
        DropDownCount = 12
        ItemHeight = 13
        TabOrder = 3
        OnChange = cmbResizeFilterChange
        Items.Strings = (
          '[ Smart ]'
          'None'
          'Triangle'
          'Hermite'
          'Bell'
          'BSpline'
          'Lanczos3'
          'Mitchell'
          'Nearest'
          'Linear'
          'Fast Linear'
          'Lossless')
        AddNewToStart = False
        AddNewToList = False
        CaseSensitive = False
        DestroyObjects = False
        LimitToList = True
        ReadOnly = False
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbl_cmbResizeFilter
        LabelRelLeft = 0
        LabelRelTop = -15
      end
      object edtQuality: TSpinEdit
        Left = 224
        Top = 126
        Width = 53
        Height = 22
        Hint = 'JPEG quality'
        MaxValue = 100
        MinValue = 1
        TabOrder = 7
        Value = 80
        OnChange = edtQualityChange
      end
      object edtBrightness: TSpinEdit
        Left = 224
        Top = 174
        Width = 53
        Height = 22
        Hint = 'Brightness'
        MaxValue = 100
        MinValue = -100
        TabOrder = 9
        Value = 0
        OnChange = edtBrightnessChange
      end
      object edtContrast: TSpinEdit
        Left = 224
        Top = 222
        Width = 53
        Height = 22
        Hint = 'Contrast'
        MaxValue = 100
        MinValue = -100
        TabOrder = 11
        Value = 0
        OnChange = edtContrastChange
      end
      object edtSharpness: TSpinEdit
        Left = 224
        Top = 270
        Width = 53
        Height = 22
        Hint = 'Sharpness'
        MaxValue = 100
        MinValue = -100
        TabOrder = 13
        Value = 0
        OnChange = edtSharpnessChange
      end
      object edtRotate: TSpinEdit
        Left = 224
        Top = 318
        Width = 53
        Height = 22
        Hint = 'Rotate'
        MaxValue = 180
        MinValue = -180
        TabOrder = 15
        Value = 0
        OnChange = edtRotateChange
        OnExit = edtRotateExit
      end
      object cmbResize: TLblComboBox
        Left = 188
        Top = 24
        Width = 88
        Height = 21
        Hint = 'Choose how pictures should be resized'
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 2
        OnChange = cmbResizeChange
        Items.Strings = (
          'No resize'
          'Best fit'
          'Shrink to fit'
          'Enlarge to fit'
          'Stretch to fit')
        AddNewToStart = False
        AddNewToList = False
        CaseSensitive = False
        DestroyObjects = False
        LimitToList = False
        ReadOnly = False
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbl_cmbResize
        LabelRelLeft = 0
        LabelRelTop = -15
      end
      object cmbNewName: TLblComboBox
        Left = 188
        Top = 72
        Width = 88
        Height = 21
        Hint = 'Choose if thumbnail filename uses a prefix or suffix'
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 5
        OnChange = cmbNewNameChange
        Items.Strings = (
          'Auto detect'
          'Add nothing'
          'Add prefix'
          'Add suffix'
          'Rename')
        AddNewToStart = False
        AddNewToList = False
        CaseSensitive = False
        DestroyObjects = False
        LimitToList = False
        ReadOnly = False
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbl_cmbNewName
        LabelRelLeft = 0
        LabelRelTop = -15
      end
    end
    object tbsAbout: TTabSheet
      Caption = 'About'
      ImageIndex = 2
      object imgIcon: TImage
        Left = 16
        Top = 16
        Width = 32
        Height = 32
      end
      object btnWebsite: TButton
        Left = 184
        Top = 320
        Width = 91
        Height = 25
        Anchors = [akRight, akBottom]
        Caption = '&Web Site'
        TabOrder = 2
        OnClick = btnWebsiteClick
      end
      object stxAbout: TStaticText
        Left = 64
        Top = 16
        Width = 201
        Height = 289
        AutoSize = False
        TabOrder = 0
      end
      object btnHelp: TButton
        Left = 80
        Top = 320
        Width = 91
        Height = 25
        Hint = 'Click here to open the Help file'
        Anchors = [akRight, akBottom]
        Caption = 'Help  F1'
        TabOrder = 1
        OnClick = btnHelpClick
      end
    end
    object tbsNews: TTabSheet
      HelpContext = 50
      Caption = 'News'
      ImageIndex = 3
      object pnlNews: TPanel
        Left = 0
        Top = 40
        Width = 284
        Height = 315
        Align = alBottom
        Anchors = [akLeft, akTop, akRight, akBottom]
        BevelOuter = bvNone
        TabOrder = 0
      end
      object cbxPollNews: TCheckBox
        Left = 8
        Top = 8
        Width = 273
        Height = 17
        Hint = 'Polls the Internet every 15 days for news updates'
        Caption = 'Check for news every 15 days'
        TabOrder = 1
        OnClick = cbxPollNewsClick
      end
      object btnUpdate: TButton
        Left = 200
        Top = 8
        Width = 75
        Height = 25
        Hint = 'Click to update news, if available'
        Anchors = [akTop, akRight]
        Caption = '&Update'
        TabOrder = 2
        Visible = False
        OnClick = btnUpdateClick
      end
    end
  end
  object btnMakeAll: TButton
    Left = 328
    Top = 344
    Width = 75
    Height = 25
    Hint = 'Makes thumbnails of all the files in the selected folder'
    Anchors = [akRight, akBottom]
    Caption = 'Make &All'
    Enabled = False
    TabOrder = 2
    OnClick = btnMakeAllClick
  end
  object btnMake: TButton
    Left = 416
    Top = 344
    Width = 75
    Height = 25
    Hint = 'Makes thumbnails of only the selected images'
    Anchors = [akRight, akBottom]
    Caption = '&Make'
    Enabled = False
    TabOrder = 3
    OnClick = btnMakeClick
  end
  object btnClose: TButton
    Left = 504
    Top = 344
    Width = 75
    Height = 25
    Hint = 'Closes Easy Thumbnails program'
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = 'Close'
    TabOrder = 4
    OnClick = btnCloseClick
  end
  object pnlStatusBar: TStatusBar
    Left = 0
    Top = 383
    Width = 592
    Height = 19
    Panels = <>
    SimplePanel = True
  end
  object pmnOriginalImage: TPopupMenu
    AutoHotkeys = maManual
    AutoLineReduction = maManual
    OnPopup = pmnOriginalImagePopup
    Left = 472
    Top = 200
    object smnFitinWindow: TMenuItem
      Caption = '&Fit in Window'
      Hint =
        'Set this option to shrink images so that they fit within the win' +
        'dow'
      OnClick = smnFitinWindowClick
    end
    object smnCopyImageTag1: TMenuItem
      Caption = '&Copy Image Tag'
      Hint = 'Copies the appropriate HTML tag for the image to the Clipboard'
      OnClick = smnCopyImageTag1Click
    end
  end
  object vclTimer: TEfTimer
    Interval = 125
    Delay = 500
    StopAfterDelay = True
    OnDelayOver = vclTimerDelayOver
    Left = 440
    Top = 200
  end
  object pmnReset: TPopupMenu
    AutoHotkeys = maManual
    AutoLineReduction = maManual
    Left = 504
    Top = 200
    object smnResetTrackbar: TMenuItem
      Caption = '&Reset Trackbar'
      Hint = 'Resets the trackbar'
      OnClick = smnResetTrackbarClick
    end
  end
  object pmnPreviewImage: TPopupMenu
    AutoHotkeys = maManual
    AutoLineReduction = maManual
    OnPopup = pmnPreviewImagePopup
    Left = 472
    Top = 240
    object smnCopyImageTag2: TMenuItem
      Caption = '&Copy Image Tag'
      Hint = 'Copies the appropriate HTML tag for the image to the Clipboard'
      OnClick = smnCopyImageTag1Click
    end
    object smnQuickPreview: TMenuItem
      Caption = '&Quick Preview'
      Hint =
        'Check this option if you want to speed up the rendering of the t' +
        'humbnail previews (file size is not available when checked)'
      Visible = False
    end
    object smnSaveasJPEG: TMenuItem
      Caption = '&Save PNG as JPEG'
      Hint =
        'Check this option if you want to PNG images saved as JPEG thumbn' +
        'ails instead of their native format'
      OnClick = smnSaveasJPEGClick
    end
  end
  object pmnFileList: TPopupMenu
    OnPopup = pmnFileListPopup
    Left = 504
    Top = 240
    object smnView: TMenuItem
      Caption = '&View'
      OnClick = smnViewClick
      object smnLargeIcons: TMenuItem
        Caption = 'Lar&ge Icons'
        Hint = 'Displays items by using large icons'
        RadioItem = True
        OnClick = smnViewItemClick
      end
      object smnSmallIcons: TMenuItem
        Tag = 1
        Caption = '&Small Icons'
        Hint = 'Displays items by using small icons'
        RadioItem = True
        OnClick = smnViewItemClick
      end
      object smnList: TMenuItem
        Tag = 2
        Caption = '&List'
        Hint = 'Displays items in a list'
        RadioItem = True
        OnClick = smnViewItemClick
      end
      object smnDetails: TMenuItem
        Tag = 3
        Caption = '&Details'
        Hint = 'Displays information about each item in the window'
        RadioItem = True
        OnClick = smnViewItemClick
      end
    end
    object smnArrangeIcons: TMenuItem
      Caption = '&Arrange Icons'
      OnClick = smnArrangeIconsClick
      object smnbyName: TMenuItem
        Tag = 1
        Caption = 'by &Name'
        Hint = 'Sorts items alphabetically by name'
        RadioItem = True
        OnClick = smnArrangeItemClick
      end
      object smnbyType: TMenuItem
        Tag = 3
        Caption = 'by &Type'
        Hint = 'Sorts items by type'
        RadioItem = True
        OnClick = smnArrangeItemClick
      end
      object smnbySize: TMenuItem
        Tag = 2
        Caption = 'by &Size'
        Hint = 'Sorts items by size, from smallest to largest'
        RadioItem = True
        OnClick = smnArrangeItemClick
      end
      object smnbyDate: TMenuItem
        Tag = 4
        Caption = 'by &Date'
        Hint = 'Sorts items by date, from oldest to most recent'
        RadioItem = True
        OnClick = smnArrangeItemClick
      end
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object smnRefresh: TMenuItem
      Caption = '&Refresh'
      Hint = 'Refreshes the contents of the current folder'
      OnClick = smnRefreshClick
    end
    object smnMakeWebpage: TMenuItem
      Caption = '&Make Web page'
      Hint = 'Creates a Web page from selected images'
      Visible = False
      OnClick = smnMakeWebpageClick
    end
    object smnShowinbrowser: TMenuItem
      Caption = '&Show in browser'
      Hint = 'Shows selected images in Web browser'
      Visible = False
      OnClick = smnShowinbrowserClick
    end
    object N5: TMenuItem
      Caption = '-'
    end
    object smnDelete: TMenuItem
      Caption = '&Delete'
      Hint = 'Sends selected files to Recycle Bin'
      OnClick = smnDeleteClick
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object smnProperties: TMenuItem
      Caption = '&Properties'
      Hint = 'Displays properties for this file'
      OnClick = smnPropertiesClick
    end
  end
  object pmnTreeList: TPopupMenu
    Left = 536
    Top = 240
    object smnTreeFind: TMenuItem
      Caption = '&Find...'
      Hint = 'Opens the find dialog'
      OnClick = smnTreeFindClick
    end
    object N3: TMenuItem
      Caption = '-'
    end
    object smnTreeRefresh: TMenuItem
      Caption = '&Refresh'
      Hint = 'Refreshes the window contents'
      OnClick = smnTreeRefreshClick
    end
    object N4: TMenuItem
      Caption = '-'
    end
    object smnTreeProperties: TMenuItem
      Caption = '&Properties'
      Hint = 'Displays properties for the current item'
      OnClick = smnTreePropertiesClick
    end
  end
  object vclImageConv: TEfImageConv
    PreviewFont.Charset = DEFAULT_CHARSET
    PreviewFont.Color = clWindowText
    PreviewFont.Height = -11
    PreviewFont.Name = 'MS Sans Serif'
    PreviewFont.Style = []
    CaptionFont.Charset = DEFAULT_CHARSET
    CaptionFont.Color = clWindowText
    CaptionFont.Height = -11
    CaptionFont.Name = 'MS Sans Serif'
    CaptionFont.Style = []
    OutputFormat = 10002
    AddSubName = adAutoDetect
    CopyOnly = False
    JpgLossless = False
    ImageBrightness = 0
    ImageContrast = 0
    ImageCropRotate = False
    ImageDataType = itOriginal
    ImageFlip = fiNoFlip
    ImageHue = 0
    ImageResampleFilter = rfNone
    ImageChangeSize = True
    ImageRotate = 0
    ImageSaturation = 0
    ImageSharpness = 0
    LowercaseName = False
    MaxHeight = 150
    MaxWidth = 150
    ResizeMode = scReduce
    SubName = 'tn_'
    OnError = vclImageConvError
    Left = 536
    Top = 200
  end
end